home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 January / WPCJAN97.ISO / hanwjan.dxr / 00003_RESResources Frame.ls < prev    next >
Encoding:
Text File  |  1996-11-07  |  641 b   |  27 lines
  1. on exitFrame
  2.   global GTSTrySprite, IFLCanChange, browserID, IFLBrowsercounter, tmpACROobj, ACROPATH
  3.   if soundBusy(1) = 0 then
  4.     puppetSound(0)
  5.   end if
  6.   go(the frame)
  7.   if (tmpACROobj = -43) or (ACROPATH = EMPTY) then
  8.     set the castNum of sprite 29 to 22
  9.     set the loc of sprite 29 to point(300, 235)
  10.     updateStage()
  11.   end if
  12.   if the mouseUp then
  13.     set IFLCanChange to 1
  14.   end if
  15.   ADDAdvertBreak(2)
  16.   HANICONSwitch()
  17.   HANQuitCD()
  18.   if browserID > 32 then
  19.     if IFLBrowsercounter = 2 then
  20.       HANCheckBrowser()
  21.     else
  22.       set IFLBrowsercounter to 1 + IFLBrowsercounter
  23.     end if
  24.   end if
  25.   IFLsectionWordAnimate()
  26. end
  27.